home *** CD-ROM | disk | FTP | other *** search
/ Illustlations by Gainax / Illustlations by Gainax.iso / pc / sadamots.exe / SHARED.DXR / 00244_ZoomˆÚs.ls < prev    next >
Encoding:
Text File  |  1994-11-27  |  341 b   |  11 lines
  1. on mouseUp
  2.   global scrmode, itemno, offx, offy
  3.   set itemno to the castNum of sprite 1
  4.   set w to float(the width of cast itemno)
  5.   set ww to float(the width of sprite 1)
  6.   set scr to float(1) / (ww / w)
  7.   set offx to (the locH of sprite 1 - the mouseH) * scr
  8.   set offy to (the locV of sprite 1 - the mouseV) * scr
  9.   play frame "Zoom"
  10. end
  11.